home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 November: Tool Chest / Dev.CD Nov 98 TC.toast / Sample Code / Text / Inline Input for TextEdit / TSMTE Interfaces / PInterfaces / TSMTE.p
Encoding:
Text File  |  1993-12-10  |  1.1 KB  |  61 lines  |  [TEXT/MPS ]

  1. (************************************************************
  2.  
  3.     File:        TSMTE.p
  4.  
  5.     Contains:    Definitions for TSMTE
  6.  
  7.     Copyright:    ©1991-1993 Apple Technology, Inc.
  8.                 All rights reserved.
  9.  
  10. ************************************************************)
  11.  
  12. unit TSMTE;
  13.  
  14. interface
  15.  
  16. uses TextEdit, Dialogs, TextServices;
  17.  
  18. const
  19.  
  20.     { signature, interface types }
  21.     
  22.     kTSMTESignature = 'tmTE';
  23.     kTSMTEInterfaceType = kTSMTESignature;
  24.     kTSMTEDialog = 'tmDI';
  25.     
  26.     { Gestalt }
  27.     
  28.     gestaltTSMTEAttr = kTSMTESignature;
  29.     gestaltTSMTEPresent = 0;
  30.     gestaltTSMTE = gestaltTSMTEPresent;    { old name, for compatibility only }
  31.     gestaltTSMTEVersion = 'tmTV';
  32.     gestaltTSMTE1 = $0100;
  33.     
  34.     { update flag for TSMTERec }
  35.  
  36.     kTSMTEAutoScroll = 1;
  37.  
  38. type
  39.  
  40.     TSMTERec = record
  41.         textH:            TEHandle;
  42.         preUpdateProc:    ProcPtr;
  43.         postUpdateProc:    ProcPtr;
  44.         updateFlag:        Longint;
  45.         refCon:            Longint;
  46.         end;
  47.     
  48.     TSMTERecPtr = ^TSMTERec;
  49.     TSMTERecHandle = ^TSMTERecPtr;
  50.  
  51.     TSMDialogRecord = record
  52.         fDialog:        DialogRecord;
  53.         fDocID:            TSMDocumentID;
  54.         fTSMTERecH:        TSMTERecHandle;
  55.         fTSMTERsvd:        array [0..2] of Longint;
  56.         end;
  57.  
  58.     TSMDialogPeek = ^TSMDialogRecord;
  59.  
  60. end.
  61.